﻿Public Class BEresultadoihq

#Region "Declaración de variables"

    Private codMarcador As Integer
    Private codLamina As Integer
    Private valor As Integer

#End Region

    Sub New()
    End Sub

    Sub New(ByVal pCodMarcador As Object, _
            ByVal pCodLamina As Object, _
            ByVal pValor As Object)

        Me._codMarcador = pCodMarcador
        Me._codLamina = pCodLamina
        Me._valor = pValor

    End Sub

    Public Property _codMarcador() As Integer
        Get
            Return Me.codMarcador
        End Get
        Set(ByVal value As Integer)
            Me.codMarcador = value
        End Set
    End Property

    Public Property _codLamina() As Integer
        Get
            Return Me.codLamina
        End Get
        Set(ByVal value As Integer)
            Me.codLamina = value
        End Set
    End Property

    Public Property _valor() As Integer
        Get
            Return Me.valor
        End Get
        Set(ByVal value As Integer)
            Me.valor = value
        End Set
    End Property

End Class
